home *** CD-ROM | disk | FTP | other *** search
/ Sound Fx / Sound Fx.iso / Software / UNZIPED / DWSTK / PLAYDWD.C < prev    next >
C/C++ Source or Header  |  1996-10-10  |  5KB  |  189 lines
  1. /******************************************************************************
  2. File:          playdwd.c
  3. Version:     2.22
  4. Tab stops: every 2 columns
  5. Project:     DWD Player
  6. Copyright: 1994-1995 DiamondWare, Ltd.    All rights reserved.
  7. Written:     Keith Weiner & Erik Lorenzen
  8. Purpose:     Contains simple example code to show how to load/play a .DWD file
  9. History:     94/10/21 KW Started
  10.                      95/02/21 EL Finalized
  11.                      95/03/22 EL Finalized for 1.01
  12.                      95/04/11 EL Finalized for 1.02
  13.                      95/06/16 EL Finalized for 1.03
  14.                      95/06/16 EL Finalized for 2.00, #ifdef'd _far for protected-mode
  15.                      95/10/05 EL Finalized for 2.10, added modual support for err_
  16.                      95/10/18 EL Finalized for 2.20, changed vol's to 95%
  17.                      95/12/07 EL Finalized for 2.21, no changes
  18.                      96/10/10 EL Finalized for 2.22, no changes
  19.  
  20. Notes
  21. -----
  22. This code isn't really robust when it comes to standard error checking
  23. and particularly recovery, software engineering technique, etc.  A buffer
  24. is statically allocated.    A better technique would be to use fstat() or stat()
  25. to determine the file's size then malloc(size).  The STK will handle songs
  26. larger than 64K (but not digitized sounds).  Obviously, you'd need to fread()
  27. such a file in chunks, or write some sort of hfread() (huge fread).  Also,
  28. exitting and cleanup is not handled robustly in this code.    The code below can
  29. only be validated by extremely careful scrutiny to make sure each case is
  30. handled properly.  A better method would the use of C's atexit function.
  31.  
  32. But all such code would make this example file less clear; its purpose was
  33. to illustrate how to call the STK, not how to write QA-proof software.
  34. ******************************************************************************/
  35.  
  36.  
  37.  
  38. #include <stdio.h>
  39. #include <stdlib.h>
  40. #include <conio.h>
  41.  
  42. #include "dws.h"
  43. #include "err.h"
  44.  
  45.  
  46.  
  47. #define BUFFSIZE 65535        /* If the linker outputs the error */
  48.                                                     /* "stack plus data exceed 64K" */
  49.                                                     /* try reducing BUFFSIZE to about 32K, */
  50.                                                     /* or compile for large model. */
  51. #ifdef __FLAT__
  52.     byte sound[BUFFSIZE];     /* _far isn't need for p-mode */
  53. #else
  54.     byte _far sound[BUFFSIZE]; /* in r-mode the STK expects a _far ptr */
  55. #endif
  56.  
  57.  
  58. void main(int argc, char **argv)
  59. {
  60.     FILE                                *fp;
  61.     dws_DETECTOVERRIDES dov;
  62.     dws_DETECTRESULTS     dres;
  63.     dws_IDEAL                     ideal;
  64.     dws_DPLAY                     dplay;
  65.     word                                result;
  66.  
  67.     printf("\nPLAYDWD 2.22 is Copyright 1994-95 DiamondWare, Ltd.\n");
  68.     printf("All rights reserved.\n\n\n");
  69.  
  70.     if (argc < 2)
  71.     {
  72.         printf("Usage PLAYDWD <dwd-file> \n");
  73.         exit(-1);
  74.     }
  75.  
  76.     fp = fopen(argv[1], "rb");
  77.  
  78.     if (fp == NULL)
  79.     {
  80.         printf("Unable to open %s\n", argv[1]);
  81.         exit(-1);
  82.     }
  83.  
  84.     fread(sound, (size_t)BUFFSIZE, 1, fp);/* if filelen < BUFFSIZE, this works */
  85.  
  86.     fclose(fp);
  87.  
  88.     /*
  89.      . We need to set every field to -1 in dws_DETECTOVERRIDES struct;
  90.      . this tells the STK to autodetect everything.  Any other value
  91.      . overrides the autodetect routine, and will be accepted on
  92.      . faith, though the STK will verify it if possible.
  93.     */
  94.     dov.baseport = (word)-1;
  95.     dov.digdma     = (word)-1;
  96.     dov.digirq     = (word)-1;
  97.  
  98.     if (!dws_DetectHardWare(&dov, &dres))
  99.     {
  100.         err_Display(dws_ErrNo(), err_DWS);
  101.     }
  102.  
  103.     if (!(dres.capability & dws_capability_DIG))
  104.     {
  105.         if ((dres.baseport != 0x388) && (dres.baseport != (word)-1))
  106.         {
  107.             printf("The sound hardware supports digitized sound playback.\n");
  108.             printf("We couldn't find the DMA channel and/or IRQ level.\n");
  109.         }
  110.         else
  111.         {
  112.             printf("DIG support not found\n");
  113.         }
  114.  
  115.         exit(-1);
  116.     }
  117.  
  118.     /*
  119.      . The "ideal" struct tells the STK how you'd like it to initialize the
  120.      . sound hardware.    In all cases, if the hardware won't support your
  121.      . request, the STK will go as close as possible.  For example, not all
  122.      . sound boards will support all sampling rates (some only support five or
  123.      . six discrete rates).
  124.     */
  125.     ideal.musictyp     = 0;      /* 0=No music, 1=OPL2 */
  126.     ideal.digtyp         = 8;      /* 0=No Dig, 8=8bit */
  127.     ideal.dignvoices = 16;     /* number of voices (up to 16) */
  128.     ideal.dignchan     = 1;      /* 1=mono */
  129.  
  130.     /* Set the ideal.digrate, in Hz */
  131.     if (!dws_DGetRateFromDWD(sound, &ideal.digrate))
  132.     {
  133.         err_Display(dws_ErrNo(), err_DWS);
  134.         goto KillIt;
  135.     }
  136.  
  137.     if (!dws_Init(&dres, &ideal))
  138.     {
  139.         err_Display(dws_ErrNo(), err_DWS);
  140.         exit(-1);
  141.     }
  142.  
  143.     /* Set Master Volume to about 95% max */
  144.     if (!dws_XMaster(242))
  145.     {
  146.         err_Display(dws_ErrNo(), err_DWS);
  147.     }
  148.  
  149.     dplay.snd          = sound;
  150.     dplay.count      = 1;          /* 0=infinite loop, else num times to play sound */
  151.     dplay.priority = 1000;
  152.     dplay.presnd     = 0;
  153.  
  154.     if (!dws_DPlay(&dplay))
  155.     {
  156.         err_Display(dws_ErrNo(), err_DWS);
  157.         goto KillIt;
  158.     }
  159.  
  160.     do
  161.     {
  162.         if (!dws_DSoundStatus(dplay.soundnum, &result))
  163.         {
  164.             err_Display(dws_ErrNo(), err_DWS);
  165.             goto KillIt;
  166.         }
  167.  
  168.     } while (result);
  169.  
  170.  
  171.     KillIt:
  172.  
  173.     if (!dws_Kill())
  174.     {
  175.         /*
  176.          . If an error occurs here, it's either dws_Kill_CANTUNHOOKISR
  177.          . or dws_NOTINITTED.  If it's dws_Kill_CANTUNHOOKISR the user
  178.          . must remove his tsr, and dws_Kill must be called again.    If it's
  179.          . dws_NOTINITTED, there's nothing to worry about at this point.
  180.         */
  181.         err_Display(dws_ErrNo(), err_DWS);
  182.  
  183.         if (dws_ErrNo() == dws_Kill_CANTUNHOOKISR)
  184.         {
  185.             goto KillIt;
  186.         }
  187.     }
  188. }
  189.